------ESTRAZIONE FILE .TXT


select tipo_riga,dt_fat,dt_sca,
protocollo,lux_fattura.anno_fat,
substr (concat ('00000',lux_fattura.num_fat),-5,5) num_fat,lux_fattura.sog_id,
--CASE WHEN TIPO_RIGA <> 'Z' THEN LUX_FATTURA.nome  ELSE CASE WHEN SO.PRESSO IS NOT NULL  THEN SO.PRESSO END END nome_soggetto,
LUX_FATTURA.NOME NOME_SOGGETTO,

so.pariva,so.codfis,
indirizzo indirizzo_soggetto,
lux_fattura.cap,
lux_fattura.LOCALITA,
concat(co.cimitero,substr(concat ('000000',co.codice_defunto),-5,5)) contratto,
co.dt_inizio,co.dt_fine,
co.nome_defunto,co.UBICAZIONE,descrizione_voce,co.numero_lampade,tariffa,

giorni giorni_competenza,
concat (iva_tar,'%') IVA,imponibile,iva imp_iva,tot_fat,
do.tipo_pagamento ,
CASE WHEN TIPO_RIGA = 'T' and do.tipo_pagamento = 'PO' THEN concat(substr (concat ('00000000000',lux_fattura.anno_fat),-11,11),substr (concat ('00000',lux_fattura.num_fat),-5,5)) END OCR,
CASE WHEN TIPO_RIGA = 'Z' THEN SUBSTR(CONCAT('0000000000000000',DO.id_dom),-16,16) END CODICE_DOMICILIAZIONE

 from lux_fattura,lux_contratto co,lux_soggetto so,lux_domiciliazione do,LUX_NUMERA_FATTURA LN
 
 where lux_fattura.cimitero = co.cimitero(+)
       and lux_fattura.codice_defunto =  co.codice_defunto(+)
       and lux_fattura.sog_id = so.sog_id
      -- and  dt_fat= to_date ('15/12/2010','dd/mm/yyyy')
       And  dt_fat= to_date (^DATA_FATTURAZIONE gg/mm/aaaa;A;ALFANUMERICO;1^^,'dd/mm/yyyy')
       and do.sog_id(+) = so.sog_id
       and do.STATO(+) = 2
       AND LN.SOG_ID=SO.SOG_ID
       AND LN.NUM_FAT=LUX_FATTURA.NUM_FAT



and do.az_id(+) = so.az_id
and lux_fattura.az_id = co.az_id(+)


order by anno_fat,num_fat,tipo_riga,descrizione_voce


















